Returns the ChScaling object for the specified axis.
expression.Scaling
expression Required. An expression that returns a ChAxis object.
This example adds a second value (y) axis to the right side of the specified chart. The second axis uses the same scale as the primary value axis.
Sub AddAxis()
Dim chConstants
Dim axisScale
Set chConstants = ChartSpace1.Constants
Set axisScale = ChartSpace1.Charts(0).Axes(chConstants.chAxisPositionLeft).Scaling
ChartSpace1.Charts(0).Axes.Add axisScale, chConstants.chAxisPositionRight, _
chConstants.chValueAxis
End Sub